home *** CD-ROM | disk | FTP | other *** search
/ Mac Magazin/MacEasy 32 / Mac Magazin and MacEasy Magazine CD - Issue 32.iso / Grafik & Text / OzTeX3.0 / TeX-inputs / LaTeX / amslatex / amsart.cls next >
Text File  |  1997-01-18  |  44KB  |  1,227 lines
  1. %% 
  2. %% This is file `amsart.cls', generated 
  3. %% on <1996/11/5> with the docstrip utility (2.2i).
  4. %% 
  5. %% The original source files were:
  6. %% 
  7. %% amsclass.dtx  (with options: `amsart')
  8. %%% ====================================================================
  9. %%%  @LaTeX-file{
  10. %%%     filename        = "amsclass.dtx",
  11. %%%     version         = "1.2q",
  12. %%%     date            = "1996/11/05",
  13. %%%     time            = "11:55:19 EST",
  14. %%%     checksum        = "63668 3423 13546 125878",
  15. %%%     author          = "American Mathematical Society",
  16. %%%     copyright       = "Copyright (C) 1996 American Mathematical Society,
  17. %%%                        all rights reserved.  Copying of this file is
  18. %%%                        authorized only if either:
  19. %%%                        (1) you make absolutely no changes to your copy,
  20. %%%                        including name; OR
  21. %%%                        (2) if you do make changes, you first rename it
  22. %%%                        to some other name.",
  23. %%%     address         = "American Mathematical Society,
  24. %%%                        Technical Support,
  25. %%%                        Electronic Products and Services,
  26. %%%                        P. O. Box 6248,
  27. %%%                        Providence, RI 02940,
  28. %%%                        USA",
  29. %%%     telephone       = "401-455-4080 or (in the USA and Canada)
  30. %%%                        800-321-4AMS (321-4267)",
  31. %%%     FAX             = "401-331-3842",
  32. %%%     email           = "tech-support@ams.org (Internet)",
  33. %%%     codetable       = "ISO/ASCII",
  34. %%%     keywords        = "latex, amslatex, ams-latex",
  35. %%%     supported       = "yes",
  36. %%%     abstract        = "This is part of the AMS-\LaTeX{} distribution.
  37. %%%                        It produces output conforming to the style
  38. %%%                        conventions of American Mathematical Society
  39. %%%                        publications.  The file \fn{amsclass.dtx} is
  40. %%%                        converted by the installation procedure
  41. %%%                        into three document classes:
  42. %%%                        \cls{amsart}, \cls{amsproc}, and \cls{amsbook},
  43. %%%                        which are intended, respectively,
  44. %%%                        for articles and books containing mathematical
  45. %%%                        research; both class files will also carry this
  46. %%%                        heading, and the particular class should be
  47. %%%                        determined from the external file name.",
  48. %%%     docstring       = "The checksum field above contains a CRC-16
  49. %%%                        checksum as the first value, followed by the
  50. %%%                        equivalent of the standard UNIX wc (word
  51. %%%                        count) utility output of lines, words, and
  52. %%%                        characters.  This is produced by Robert
  53. %%%                        Solovay's checksum utility.",
  54. %%%  }
  55. %%% ====================================================================
  56. \NeedsTeXFormat{LaTeX2e}% LaTeX 2.09 can't be used (nor non-LaTeX)
  57. [1994/12/01]% LaTeX date must December 1994 or later
  58. \ProvidesClass{amsart}[1996/11/05 v1.2q]
  59. \def\@tempa#1#2\@nil{\edef\@classname{#1}}
  60. \expandafter\@tempa\@currnamestack{}{}{}\@nil
  61. \ifx\@classname\@empty \edef\@classname{\@currname}\fi
  62. \DeclareOption{a4paper}{\paperheight 297mm\paperwidth 210mm
  63.   \textheight 54.5pc }
  64. \DeclareOption{letterpaper}{\paperheight 11in\paperwidth 8.5in }
  65. \DeclareOption{landscape}{\@tempdima\paperheight
  66.   \paperheight\paperwidth \paperwidth\@tempdima}
  67. \DeclareOption{portrait}{}
  68. \DeclareOption{oneside}{\@twosidefalse \@mparswitchfalse}
  69. \DeclareOption{twoside}{\@twosidetrue  \@mparswitchtrue}
  70. \DeclareOption{draft}{\overfullrule5\p@ }
  71. \DeclareOption{final}{\overfullrule\z@ }
  72. \def\dateposted#1{\def\@dateposted{\ (#1)}}%
  73. \let\@dateposted\@empty
  74. \DeclareOption{e-only}{%
  75.   \def\volinfo{Volume \currentvolume}%
  76.   \dateposted{Xxxx XX, XXXX}%
  77. }
  78. \newif\if@titlepage
  79. \DeclareOption{titlepage}{\@titlepagetrue}
  80. \DeclareOption{notitlepage}{\@titlepagefalse}
  81. \newif\if@openright
  82. \DeclareOption{openright}{\@openrighttrue}
  83. \DeclareOption{openany}{\@openrightfalse}
  84. \DeclareOption{onecolumn}{\@twocolumnfalse}
  85. \DeclareOption{twocolumn}{\@twocolumntrue}
  86. \DeclareOption{nomath}{}
  87. \def\mathfrak{needed}
  88. \DeclareOption{noamsfonts}{\let\mathfrak\relax}
  89. \DeclareOption{psamsfonts}{%
  90.   \PassOptionsToPackage{psamsfonts}{amsfonts}%
  91.   \PassOptionsToPackage{cmex10}{amsmath}}
  92. \newif\iftagsleft@
  93. \DeclareOption{leqno}{%
  94.   \tagsleft@true \PassOptionsToPackage{leqno}{amsmath}}
  95. \DeclareOption{reqno}{%
  96.   \tagsleft@false \PassOptionsToPackage{reqno}{amsmath}}
  97. \newif\ifctagsplit@
  98. \DeclareOption{centertags}{%
  99.   \ctagsplit@true \PassOptionsToPackage{centertags}{amsmath}}
  100. \DeclareOption{tbtags}{%
  101.   \ctagsplit@false \PassOptionsToPackage{tbtags}{amsmath}}
  102. \DeclareOption{fleqn}{%
  103.   \def\[{\relax
  104.     \ifmmode\@badmath
  105.     \else
  106.       \begin{trivlist}%
  107.       \@beginparpenalty\predisplaypenalty
  108.       \@endparpenalty\postdisplaypenalty
  109.       \item[]\leavevmode
  110.       \hbox to\linewidth\bgroup$\displaystyle
  111.       \hskip\mathindent\bgroup
  112.     \fi}%
  113.   \def\]{\relax
  114.     \ifmmode
  115.       \egroup \m@th$\hfil \egroup
  116.       \end{trivlist}%
  117.     \else \@badmath
  118.     \fi}%
  119.   \renewenvironment{equation}{%
  120.     \@beginparpenalty\predisplaypenalty
  121.     \@endparpenalty\postdisplaypenalty
  122.     \refstepcounter{equation}%
  123.     \@topsep\abovedisplayskip \trivlist
  124.     \item[]\leavevmode
  125.     \hbox to\linewidth\bgroup\hskip\mathindent$\displaystyle
  126.   }{%
  127.     \m@th$\hfil \displaywidth\linewidth \hbox{\@eqnnum}\egroup
  128.     \endtrivlist
  129.   }%
  130.   \renewenvironment{eqnarray}{%
  131.     \stepcounter{equation}\let\@currentlabel\theequation
  132.     \global\@eqnswtrue \global\@eqcnt\z@ \tabskip\mathindent
  133.     \let\\=\@eqncr \abovedisplayskip\topsep
  134.     \ifvmode \advance\abovedisplayskip\partopsep \fi
  135.     \belowdisplayskip\abovedisplayskip
  136.     \belowdisplayshortskip\abovedisplayskip
  137.     \abovedisplayshortskip\abovedisplayskip
  138.     $$\everycr{}\halign to\linewidth\bgroup
  139.       \hskip\@centering
  140.       $\displaystyle\tabskip\z@skip####\m@th$&%
  141.       \@eqnsel \global\@eqcnt\@ne
  142.       \hfil${}####{}\m@th$\hfil&%
  143.       \global\@eqcnt\tw@
  144.       $\displaystyle ####\m@th$\hfil\tabskip\@centering&%
  145.       \global\@eqcnt\thr@@
  146.       \hbox to \z@\bgroup\hss####\egroup\tabskip\z@skip\cr
  147.     }{%
  148.       \@@eqncr \egroup \global\advance\c@equation\m@ne$$%
  149.       \global\@ignoretrue
  150.     }%
  151.   \newdimen\mathindent \mathindent\leftmargini
  152. }
  153. \newcommand{\@mainsize}{10}
  154. \newcommand{\@ptsize}{0}
  155. \newcommand{\larger}[1][1]{%
  156.   \count@\@currsizeindex \advance\count@#1\relax
  157.   \ifnum\count@<\z@ \count@\z@ \else\ifnum\count@>12 \count@12 \fi\fi
  158.   \ifcase\count@
  159.     \Tiny\or\Tiny\or\tiny\or\SMALL\or\Small\or\small
  160.     \or\normalsize
  161.     \or\large\or\Large\or\LARGE\or\huge\or\Huge\else\Huge
  162.   \fi
  163. }
  164. \newcommand{\smaller}[1][1]{\larger[-#1]}
  165. \def\@adjustvertspacing{%
  166.   \bigskipamount.7\baselineskip plus.7\baselineskip
  167.   \medskipamount\bigskipamount \divide\medskipamount\tw@
  168.   \smallskipamount\medskipamount \divide\smallskipamount\tw@
  169.   \abovedisplayskip\medskipamount
  170.   \belowdisplayskip \abovedisplayskip
  171.   \abovedisplayshortskip\abovedisplayskip
  172.   \advance\abovedisplayshortskip-1\abovedisplayskip
  173.   \belowdisplayshortskip\abovedisplayshortskip
  174.   \advance\belowdisplayshortskip 1\smallskipamount
  175.   \jot\baselineskip \divide\jot 4 \relax
  176. }
  177. \renewcommand\normalsize{\@xsetfontsize\normalsize 6%
  178.   \@adjustvertspacing \let\@listi\@listI}
  179. \newcommand\Tiny{\@xsetfontsize\Tiny 1}
  180. \newcommand\tiny{\@xsetfontsize\tiny 2}
  181. \newcommand\SMALL{\@xsetfontsize\SMALL 3}
  182. \newcommand\Small{\@xsetfontsize\Small 4%
  183.   \@adjustvertspacing
  184.   \def\@listi{\topsep\smallskipamount \parsep\z@skip \itemsep\z@skip}}
  185. \newcommand\small{\@xsetfontsize\small 5\@adjustvertspacing}
  186. \def\footnotesize{\Small}
  187. \def\scriptsize{\SMALL}
  188. \newcommand\large{\@xsetfontsize\large 7\@adjustvertspacing}
  189. \newcommand\Large{\@xsetfontsize\Large 8\@adjustvertspacing}
  190. \newcommand\LARGE{\@xsetfontsize\LARGE 9}
  191. \newcommand\huge{\@xsetfontsize\huge{10}}
  192. \newcommand\Huge{\@xsetfontsize\Huge{11}}
  193. \def\@xsetfontsize#1#2{%
  194.   \chardef\@currsizeindex#2\relax
  195.   \edef\@tempa{\@nx\@setfontsize\@nx#1%
  196.     \@xp\ifcase\@xp\@currsizeindex\@typesizes
  197.       \else{99}{99}\fi}%
  198.   \@tempa
  199. }
  200. \chardef\@currsizeindex=6
  201. \widowpenalty=10000
  202. \clubpenalty=10000
  203. \brokenpenalty=10000
  204. \newdimen\linespacing
  205. \lineskip=1pt \lineskiplimit=1pt
  206. \normallineskip=1pt \normallineskiplimit=1pt
  207. \let\baselinestretch=\@empty
  208. \headheight=5pt \headsep=14pt
  209. \footskip=12pt
  210. \textheight=50.5pc \topskip=10pt
  211. \textwidth=30pc
  212. \columnsep=10pt \columnseprule=0pt
  213. \marginparwidth=90pt
  214. \marginparsep=11pt
  215. \marginparpush=5pt
  216. \AtBeginDocument{\settoheight{\footnotesep}{\footnotesize M$^1$}}
  217. \skip\footins=7pt plus11pt
  218. \skip\@mpfootins=\skip\footins
  219. \fboxsep=3pt \fboxrule=.4pt
  220. \arrayrulewidth=.4pt    \doublerulesep=2pt
  221. \labelsep=5pt           \arraycolsep=\labelsep
  222. \tabcolsep=\labelsep    \tabbingsep=\labelsep
  223. \floatsep=15pt plus 12pt    \dblfloatsep=15pt plus 12pt
  224. \textfloatsep=\floatsep  \dbltextfloatsep=15pt plus 12pt
  225. \intextsep=\floatsep
  226. \@fptop=0pt plus1fil     \@dblfptop=0pt plus1fil
  227. \@fpbot=0pt plus1fil     \@dblfpbot=0pt plus1fil
  228. \@fpsep=8pt plus2fil     \@dblfpsep=8pt plus2fil\relax
  229. \parskip=0pt \relax
  230. \newdimen\normalparindent
  231. \normalparindent=12pt
  232. \parindent=\normalparindent
  233. \partopsep=0pt \relax \parsep=0pt \relax \itemsep=0pt \relax
  234. \@lowpenalty=51         \@medpenalty=151        \@highpenalty=301
  235. \@beginparpenalty=-\@lowpenalty
  236. \@endparpenalty=-\@lowpenalty
  237. \@itempenalty=-\@lowpenalty
  238. \DeclareOption{10pt}{\def\@mainsize{10}\def\@ptsize{0}%
  239.   \def\@typesizes{%
  240.     \or{5}{6}\or{6}{7}\or{7}{8}\or{8}{10}\or{9}{11}%
  241.     \or{10}{12}% normalsize
  242.     \or{\@xipt}{13}\or{\@xiipt}{14}\or{\@xivpt}{17}%
  243.     \or{\@xviipt}{20}\or{\@xxpt}{24}}%
  244.   \normalsize \linespacing=\baselineskip
  245. }
  246. \DeclareOption{11pt}{\def\@mainsize{11}\def\@ptsize{1}%
  247.   \def\@typesizes{%
  248.     \or{6}{7}\or{7}{8}\or{8}{10}\or{9}{11}\or{10}{12}%
  249.     \or{\@xipt}{13}% normalsize
  250.     \or{\@xiipt}{14}\or{\@xivpt}{17}\or{\@xviipt}{20}%
  251.     \or{\@xxpt}{24}\or{\@xxvpt}{30}}%
  252.   \normalsize \linespacing=\baselineskip
  253. }
  254. \DeclareOption{12pt}{\def\@mainsize{12}\def\@ptsize{2}%
  255.   \def\@typesizes{%
  256.     \or{7}{8}\or{8}{10}\or{9}{11}\or{10}{12}\or{\@xipt}{13}%
  257.     \or{\@xiipt}{14}% normalsize
  258.     \or{\@xivpt}{17}\or{\@xviipt}{20}\or{\@xxpt}{24}%
  259.     \or{\@xxvpt}{30}\or{\@xxvpt}{30}}%
  260.   \normalsize \linespacing=\baselineskip
  261. }
  262. \DeclareOption{8pt}{\def\@mainsize{8}\def\@ptsize{8}%
  263.   \def\@typesizes{%
  264.     \or{5}{6}\or{5}{6}\or{5}{6}\or{6}{7}\or{7}{8}%
  265.     \or{8}{10}% normalsize
  266.     \or{9}{11}\or{10}{12}\or{\@xipt}{13}%
  267.     \or{\@xiipt}{14}\or{\@xivpt}{17}}%
  268.   \normalsize \linespacing=\baselineskip
  269. }
  270. \DeclareOption{9pt}{\def\@mainsize{9}\def\@ptsize{9}%
  271.   \def\@typesizes{%
  272.     \or{5}{6}\or{5}{6}\or{6}{7}\or{7}{8}\or{8}{10}%
  273.     \or{9}{11}% normalsize
  274.     \or{10}{12}\or{\@xipt}{13}\or{\@xiipt}{14}%
  275.     \or{\@xivpt}{17}\or{\@xviipt}{20}}%
  276.   \normalsize \linespacing=\baselineskip
  277. }
  278. \def\ps@empty{\let\@mkboth\@gobbletwo
  279.   \let\@oddhead\@empty \let\@evenhead\@empty
  280.   \let\@oddfoot\@empty \let\@evenfoot\@empty
  281.   \global\topskip\normaltopskip}
  282. \def\ps@plain{\ps@empty
  283.   \def\@oddfoot{\normalfont\scriptsize \hfil\thepage\hfil}%
  284.   \let\@evenfoot\@oddfoot}
  285. \def\ps@headings{\ps@empty
  286.   \def\@evenhead{\normalfont\scriptsize
  287.       \rlap{\thepage}\hfil \leftmark{}{}\hfil}%
  288.   \def\@oddhead{\normalfont\scriptsize \hfil
  289.       \rightmark{}{}\hfil \llap{\thepage}}%
  290.   \let\@mkboth\markboth
  291. }
  292. \let\sectionname\@empty
  293. \let\subsectionname\@empty
  294. \let\subsubsectionname\@empty
  295. \let\paragraphname\@empty
  296. \let\subparagraphname\@empty
  297. \def\leftmark{\expandafter\@firstoftwo\topmark{}{}}
  298. \def\rightmark{\expandafter\@secondoftwo\botmark{}{}}
  299. \def\ps@firstpage{\ps@plain
  300.   \def\@oddfoot{\normalfont\scriptsize \hfil\thepage\hfil
  301.      \global\topskip\normaltopskip}%
  302.   \let\@evenfoot\@oddfoot
  303.   \def\@oddhead{\@serieslogo\hss}%
  304.   \let\@evenhead\@oddhead % in case an article starts on a left-hand page
  305. }
  306. \long\def\@nilgobble#1\@nil{}
  307. \def\markboth#1#2{%
  308.   \begingroup
  309.     \@temptokena{{#1}{#2}}\xdef\@themark{\the\@temptokena}%
  310.     \mark{\the\@temptokena}%
  311.   \endgroup
  312.   \if@nobreak\ifvmode\nobreak\fi\fi}
  313. \def\ps@myheadings{\ps@headings \let\@mkboth\@gobbletwo}
  314. \newskip\normaltopskip
  315. \normaltopskip=10pt \relax
  316. \let\sectionmark\@gobble
  317. \let\subsectionmark\@gobble
  318. \let\subsubsectionmark\@gobble
  319. \let\paragraphmark\@gobble
  320.  
  321. \DeclareOption{makeidx}{}
  322. \input{amsgen.sty}
  323. \ExecuteOptions{leqno,centertags,letterpaper,portrait,%
  324.   10pt,twoside,onecolumn,final}
  325. \ProcessOptions\relax
  326. \if@compatibility
  327.   \def\@tempa#1{\let\mathfrak\relax
  328.     \RequirePackage{amstex}\relax}\expandafter\@tempa
  329. \else
  330.   \expandafter\@iden
  331. \fi
  332. {% if native mode
  333. \@ifclasswith{\@classname}{nomath}{%
  334.   \def\numberwithin#1#2{\@ifundefined{c@#1}{\@nocounterr{#1}}{%
  335.     \@ifundefined{c@#2}{\@nocounterr{#2}}{%
  336.     \@addtoreset{#1}{#2}%
  337.     \toks@\@xp\@xp\@xp{\csname the#1\endcsname}%
  338.     \@xp\xdef\csname the#1\endcsname
  339.       {\@xp\@nx\csname the#2\endcsname
  340.        .\the\toks@}}}}%
  341. }{%
  342.   \RequirePackage{amsmath}\relax
  343. }
  344. \@ifclasswith{\@classname}{noamsfonts}{%
  345. }{%
  346.   \let\mathfrak\relax
  347.   \IfFileExists{Umsa.fd}{%
  348.     \RequirePackage{amsfonts}\relax
  349.   }{%
  350.     \ClassError{\@classname
  351.     }{%
  352.       Font description files Umsa.fd et al. not found; amsfonts.sty
  353.       not loaded.
  354.     }{%
  355.       A font description (.fd) file is needed for every font being used;
  356.       these files may be in the inputs area along with other style and
  357.       class files, or in a dedicated subdirectory if your system uses
  358.       a TDS structure.
  359.     }%
  360.   }%
  361. }
  362. }% end native mode branch
  363. \newcommand{\uppercasenonmath}[1]{\toks@\@emptytoks
  364.   \@xp\@skipmath\@xp\@empty#1$$%
  365.   \edef#1{\@nx\@upprep\the\toks@}%
  366. }
  367. \newcommand{\@upprep}{%
  368.   \spaceskip1.3\fontdimen2\font plus1.3\fontdimen3\font
  369.   \upchars@}
  370. \newcommand{\upchars@}{%
  371.   \def\ss{SS}\def\i{I}\def\j{J}\def\ae{\AE}\def\oe{\OE}%
  372.   \def\o{\O}\def\aa{\AA}\def\l{\L}\def\Mc{M{\scshape c}}}
  373. \newcommand{\@skipmath}{}
  374. \long\def\@skipmath#1$#2${%
  375.   \@xskipmath#1\(\)%
  376.   \@ifnotempty{#2}{\toks@\@xp{\the\toks@$#2$}\@skipmath\@empty}}%
  377. \newcommand{\@xskipmath}{}
  378. \long\def\@xskipmath#1\(#2\){%
  379.   \uppercase{\toks@\@xp\@xp\@xp{\@xp\the\@xp\toks@#1}}%
  380.   \@ifnotempty{#2}{\toks@\@xp{\the\toks@\(#2\)}\@xskipmath\@empty}}%
  381. \newcommand{\today}{%
  382.   \relax\ifcase\month\or
  383.   January\or February\or March\or April\or May\or June\or
  384.   July\or August\or September\or October\or November\or December\fi
  385.   \space\number\day, \number\year}
  386. \DeclareOldFontCommand{\rm}{\normalfont\rmfamily}{\mathrm}
  387. \DeclareOldFontCommand{\sf}{\normalfont\sffamily}{\mathsf}
  388. \DeclareOldFontCommand{\tt}{\normalfont\ttfamily}{\mathtt}
  389. \DeclareOldFontCommand{\bf}{\normalfont\bfseries}{\mathbf}
  390. \DeclareOldFontCommand{\it}{\normalfont\itshape}{\mathit}
  391. \DeclareOldFontCommand{\sl}{\normalfont\slshape}{\@nomath\sl}
  392. \DeclareOldFontCommand{\sc}{\normalfont\scshape}{\@nomath\sc}
  393. \renewcommand*{\title}[2][]{\gdef\shorttitle{#1}\gdef\@title{#2}}
  394. \edef\title{\@nx\@dblarg
  395.   \@xp\@nx\csname\string\title\endcsname}
  396. \renewcommand{\author}[2][]{%
  397.   \ifx\@empty\authors
  398.     \gdef\shortauthors{#1}\gdef\authors{#2}%
  399.   \else
  400.     \g@addto@macro\shortauthors{\and#1}%
  401.     \g@addto@macro\authors{\and#2}%
  402.     \g@addto@macro\addresses{\author{}}%
  403.   \fi
  404. }
  405. \edef\author{\@nx\@dblarg
  406.   \@xp\@nx\csname\string\author\endcsname}
  407. \let\shortauthors\@empty   \let\authors\@empty
  408. \let\addresses\@empty      \let\thankses\@empty
  409. \newcommand{\address}[2][]{\g@addto@macro\addresses{\address{#1}{#2}}}
  410. \newcommand{\curraddr}[2][]{\g@addto@macro\addresses{\curraddr{#1}{#2}}}
  411. \newcommand{\email}[2][]{\g@addto@macro\addresses{\email{#1}{#2}}}
  412. \newcommand{\urladdr}[2][]{\g@addto@macro\addresses{\urladdr{#1}{#2}}}
  413. \renewcommand{\thanks}[1]{\g@addto@macro\thankses{\thanks{#1}}}
  414. \def\enddoc@text{\ifx\@empty\@translators \else\@settranslators\fi
  415.   \ifx\@empty\addresses \else\@setaddresses\fi}
  416. \AtEndDocument{\enddoc@text}
  417. \def\@setaddresses{\par
  418.   \nobreak \begingroup
  419. \footnotesize
  420.   \def\author##1{\nobreak\addvspace\bigskipamount}%
  421.   \def\\{\unskip, \ignorespaces}%
  422.   \interlinepenalty\@M
  423.   \def\address##1##2{\begingroup
  424.     \par\addvspace\bigskipamount\indent
  425.     \@ifnotempty{##1}{(\ignorespaces##1\unskip) }%
  426.     {\scshape\ignorespaces##2}\par\endgroup}%
  427.   \def\curraddr##1##2{\begingroup
  428.     \@ifnotempty{##2}{\nobreak\indent{\itshape Current address}%
  429.       \@ifnotempty{##1}{, \ignorespaces##1\unskip}\/:\space
  430.       ##2\par\endgroup}}%
  431.   \def\email##1##2{\begingroup
  432.     \@ifnotempty{##2}{\nobreak\indent{\itshape E-mail address}%
  433.       \@ifnotempty{##1}{, \ignorespaces##1\unskip}\/:\space
  434.       \ttfamily##2\par\endgroup}}%
  435.   \def\urladdr##1##2{\begingroup
  436.     \@ifnotempty{##2}{\nobreak\indent{\itshape URL}%
  437.       \@ifnotempty{##1}{, \ignorespaces##1\unskip}\/:\space
  438.       \ttfamily##2\par\endgroup}}%
  439.   \addresses
  440.   \endgroup
  441. }
  442. \let\@date\@empty
  443. \def\dedicatory#1{\def\@dedicatory{#1}}
  444. \let\@dedicatory=\@empty
  445. \def\keywords#1{\def\@keywords{#1}}
  446. \let\@keywords=\@empty
  447. \def\subjclass#1{\def\@subjclass{#1}}
  448. \let\@subjclass=\@empty
  449. \def\commby#1{\def\@commby{(Communicated by #1)}}
  450. \let\@commby=\@empty
  451. \def\translator#1{%
  452.   \ifx\@empty\@translators \def\@translators{#1}%
  453.   \else\g@addto@macro\@translators{\and#1}\fi}
  454. \let\@translators=\@empty
  455. \def\@settranslators{\par\begingroup
  456.   \addvspace{6\p@\@plus9\p@}%
  457.   \hbox to\columnwidth{\hss\normalfont\normalsize
  458.     Translated by %
  459.     \andify\@translators \uppercasenonmath\@translators
  460.     \@translators}
  461.   \endgroup
  462. }
  463. \newcommand{\xandlist}[4]{\@andlista{{#1}{#2}{#3}}#4\and\and}
  464. \def\@andlista#1#2\and#3\and{\@andlistc{#2}\@ifnotempty{#3}{%
  465.   \@andlistb#1{#3}}}
  466. \def\@andlistb#1#2#3#4#5\and{%
  467.   \@ifempty{#5}{%
  468.     \@andlistc{#2#4}%
  469.   }{%
  470.     \@andlistc{#1#4}\@andlistb{#1}{#3}{#3}{#5}%
  471.   }}
  472. \let\@andlistc\@iden
  473. \newcommand{\nxandlist}[4]{%
  474.   \def\@andlistc##1{\toks@\@xp{\the\toks@##1}}%
  475.   \toks@{\toks@\@emptytoks \@andlista{{#1}{#2}{#3}}}%
  476.   \the\@xp\toks@#4\and\and
  477.   \edef#4{\the\toks@}%
  478.   \let\@andlistc\@iden}
  479. \newcommand{\andify}{%
  480.   \nxandlist{\unskip, }{\unskip{} and~}{\unskip, and~}}
  481. \def\and{\unskip{ }and \ignorespaces}
  482. \def\maketitle{\par
  483.   \@topnum\z@ % this prevents figures from falling at the top of page 1
  484.   \@setcopyright
  485.   \uppercasenonmath\shorttitle
  486.   \ifx\@empty\shortauthors \let\shortauthors\shorttitle
  487.   \else \andify\shortauthors \uppercasenonmath\shortauthors \fi
  488.   \@maketitle@hook
  489.   \begingroup
  490.   \@maketitle
  491.   \toks@\@xp{\shortauthors}\@temptokena\@xp{\shorttitle}%
  492.   \edef\@tempa{\@nx\markboth{\the\toks@}{\the\@temptokena}}\@tempa
  493.   \endgroup
  494.   \thispagestyle{firstpage}% this sets first page specifications
  495.   \c@footnote\z@
  496.   \def\do##1{\let##1\relax}%
  497.   \do\maketitle \do\@maketitle \do\title \do\@xtitle \do\@title
  498.   \do\author \do\@xauthor \do\address \do\@xaddress
  499.   \do\email \do\@xemail \do\curraddr \do\@xcurraddr
  500.   \do\commby \do\@commby
  501.   \do\dedicatory \do\@dedicatory \do\thanks \do\thankses
  502.   \do\keywords \do\@keywords \do\subjclass \do\@subjclass
  503. }
  504. \def\@maketitle@hook{\global\let\@maketitle@hook\@empty}
  505. \def\@maketitle{%
  506.   \normalfont\normalsize
  507.   \let\@makefnmark\relax  \let\@thefnmark\relax
  508.   \ifx\@empty\@date\else \@footnotetext{\@setdate}\fi
  509.   \ifx\@empty\@subjclass\else \@footnotetext{\@setsubjclass}\fi
  510.   \ifx\@empty\@keywords\else \@footnotetext{\@setkeywords}\fi
  511.   \ifx\@empty\thankses\else \@footnotetext{%
  512.     \def\par{\let\par\@par}\@setthanks}\fi
  513.   \@mkboth{\@nx\shortauthors}{\@nx\shorttitle}%
  514.   \global\topskip42\p@\relax % 5.5pc   "   "   "     "     "
  515.   \@settitle
  516.   \ifx\@empty\authors \else \@setauthors \fi
  517.   \ifx\@empty\@dedicatory
  518.   \else
  519.     \baselineskip18\p@
  520.     \vtop{\centering{\footnotesize\itshape\@dedicatory\@@par}%
  521.       \global\dimen@i\prevdepth}\prevdepth\dimen@i
  522.   \fi
  523.   \@setabstract
  524.   \normalsize
  525.   \if@titlepage
  526.     \newpage
  527.   \else
  528.     \dimen@34\p@ \advance\dimen@-\baselineskip
  529.     \vskip\dimen@\relax
  530.   \fi
  531. } % end \@maketitle
  532. \AtBeginDocument{%
  533.   \@ifundefined{publname}{%
  534.     \let\publname\@empty
  535.     \let\@serieslogo\@empty
  536.   }{%
  537.     \def\@serieslogo{%
  538.       \vbox to\headheight{%
  539.         \parindent\z@ \fontsize{6}{7\p@}\selectfont
  540.         \noindent\publname\newline
  541.         \volinfo, \pageinfo \@dateposted\newline \@PII\endgraf
  542.         \vss
  543.       }%
  544.     }%
  545.   }%
  546. }
  547. \AtBeginDocument{%
  548.   \@ifundefined{volinfo}{%
  549.     \def\volinfo{%
  550.       Volume \currentvolume, Number \number0\currentissue,
  551.       \currentmonth\ \currentyear
  552.     }%
  553.   }{}%
  554. }
  555. \def\issueinfo#1#2#3#4{\def\currentvolume{#1}\def\currentissue{#2}%
  556.   \def\currentmonth{#3}\def\currentyear{#4}}
  557. \issueinfo{00}% volume number
  558.   {0}%        % issue number
  559.   {Xxxx}%     % month
  560.   {XXXX}%     % year
  561. \def\copyrightinfo#1#2{\def\copyrightyear{#1}\def\copyrightholder{#2}}
  562. \copyrightinfo{0000}{(copyright holder)}
  563. \def\pagespan#1#2{\setcounter{page}{#1}%
  564.   \ifnum\c@page<\z@ \pagenumbering{roman}\setcounter{page}{-#1}\fi
  565.   \def\start@page{#1}\def\end@page{#2}}
  566. \pagespan{000}{000}
  567. \@ifundefined{pageinfo}{%
  568.   \def\pageinfo{%
  569.     \ifnum\start@page=\z@
  570.       Pages 000--000
  571.     \else
  572.       \ifx\start@page\end@page
  573.         Page \start@page
  574.       \else
  575.         Pages \start@page--\end@page
  576.       \fi
  577.     \fi}%
  578. }{}
  579. \@ifundefined{ISSN}{\def\ISSN{0000-0000}}{}
  580. \newcommand\PII[1]{\def\@PII{#1}}
  581. \PII{S \ISSN(XX)0000-0}
  582. \newinsert\copyins
  583. \skip\copyins=1.5pc
  584. \count\copyins=1000 % magnification factor, 1000 = 100%
  585. \dimen\copyins=.5\textheight % maximum allowed per page
  586. \def\@setcopyright{%
  587.   \ifx\@empty\@serieslogo
  588.   \else\ifx\@empty\copyrightyear
  589.   \else
  590.     \insert\copyins{\hsize\textwidth
  591.       \parfillskip\z@ \leftskip\z@\@plus.9\textwidth
  592.       \fontsize{6}{7\p@}\normalfont\upshape
  593.       \everypar{}%
  594.       \vskip-\skip\copyins \nointerlineskip
  595.       \noindent\vrule\@width\z@\@height\skip\copyins
  596.       \copyright\copyrightyear\ \copyrightholder
  597.       \par
  598.       \kern\z@}%
  599.   \fi\fi
  600. }
  601. \def\@combinefloats{%
  602.   \ifx \@toplist\@empty \else \@cflt \fi
  603.   \ifx \@botlist\@empty \else \@cflb \fi
  604.   \ifvoid\copyins \else \@cflci \fi
  605. }
  606. \def\@cflci{%
  607.   \if\if@twocolumn \if@firstcolumn F\else T\fi\else T\fi T%
  608.       \setbox\@outputbox\vbox{%
  609.         \unvbox\@outputbox
  610.         \vskip\skip\copyins
  611.         \hbox to\columnwidth{%
  612.           \hss\vbox to\z@{\vss\unvbox\copyins}}}%
  613.   \fi
  614. }
  615. \newcommand{\abstractname}{Abstract}
  616. \newcommand{\keywordsname}{Key words and phrases}
  617. \newcommand{\subjclassname}{\textup{1991} Mathematics Subject
  618.      Classification}
  619. \def\@tempb{amsart}
  620. \ifx\@classname\@tempb
  621.   \newcommand{\datename}{\textit{Date}:}
  622. \else
  623.   \newcommand{\datename}{Received by the editors}
  624. \fi
  625. \def\@settitle{\begin{center}%
  626.   \baselineskip14\p@\relax
  627.     \bfseries
  628. \uppercasenonmath\@title
  629.   \@title
  630.   \end{center}%
  631. }
  632. \def\@setauthors{%
  633.   \begingroup
  634.   \trivlist
  635.   \centering\footnotesize \@topsep30\p@\relax
  636.   \advance\@topsep by -\baselineskip
  637.   \item\relax
  638.   \andify\authors
  639. \uppercasenonmath\authors
  640.   \authors
  641.   \endtrivlist
  642.   \endgroup
  643. }
  644. \def\@setdate{\datename\ \@date\@addpunct.}
  645. \def\@setsubjclass{%
  646.   {\itshape\subjclassname.}\enspace\@subjclass\@addpunct.}
  647. \def\@setkeywords{%
  648.   {\itshape \keywordsname.}\enspace \@keywords\@addpunct.}
  649. \def\@setthanks{\def\thanks##1{\par##1\@addpunct.}\thankses}
  650. \newbox\abstractbox
  651. \newenvironment{abstract}{%
  652.   \ifx\maketitle\relax
  653.     \ClassWarning{\@classname}{Abstract should precede
  654.       \protect\maketitle\space in AMS documentclasses; reported}%
  655.   \fi
  656.   \global\setbox\abstractbox=\vtop \bgroup
  657.   \normalfont\Small
  658.   \Small
  659.   \list{}{\labelwidth\z@
  660.     \leftmargin3pc \rightmargin\leftmargin
  661.     \listparindent\normalparindent \itemindent\z@
  662.     \parsep\z@ \@plus\p@
  663.     \let\fullwidthdisplay\relax
  664.     }%
  665.   \item[\hskip\labelsep\scshape\abstractname.]%
  666. }{%
  667.   \endlist\egroup
  668.   \ifx\@setabstract\relax \@setabstracta \fi
  669. }
  670. \def\@setabstract{\@setabstracta \global\let\@setabstract\relax}
  671. \def\@setabstracta{%
  672.   \ifvoid\abstractbox
  673.   \else
  674.     \skip@20\p@ \advance\skip@-\lastskip
  675.     \advance\skip@-\baselineskip \vskip\skip@
  676.     \box\abstractbox
  677.     \prevdepth\z@ % because \abstractbox is a vtop
  678.   \fi
  679. }
  680. \def\titlepage{%
  681.   \clearpage
  682.   \thispagestyle{empty}\setcounter{page}{0}}
  683. \def\endtitlepage{\newpage}
  684. \def\labelenumi{\theenumi.}
  685. \def\theenumi{\@arabic\c@enumi}
  686. \def\labelenumii{(\theenumii)}
  687. \def\theenumii{\@alph\c@enumii}
  688. \def\p@enumii{\theenumi}
  689. \def\labelenumiii{(\theenumiii)}
  690. \def\theenumiii{\@roman\c@enumiii}
  691. \def\p@enumiii{\theenumi(\theenumii)}
  692. \def\labelenumiv{(\theenumiv)}
  693. \def\theenumiv{\@Alph\c@enumiv}
  694. \def\p@enumiv{\p@enumiii\theenumiii}
  695. \def\labelitemi{$\m@th\bullet$}
  696. \def\labelitemii{\bfseries --}% \upshape already done by \itemize
  697. \def\labelitemiii{$\m@th\ast$}
  698. \def\labelitemiv{$\m@th\cdot$}
  699. \newenvironment{verse}{\let\\\@centercr
  700.   \list{}{\itemsep\z@ \itemindent -1.5em\listparindent\itemindent
  701.   \rightmargin\leftmargin \advance\leftmargin 1.5em}\item[]%
  702. }{%
  703.   \endlist
  704. }
  705. \let\endverse=\endlist % for efficiency
  706. \newenvironment{quotation}{\list{}{%
  707.     \leftmargin3pc \listparindent\normalparindent
  708.     \itemindent\z@
  709.     \rightmargin\leftmargin \parsep\z@ \@plus\p@}%
  710.   \item[]%
  711. }{%
  712.   \endlist
  713. }
  714. \let\endquotation=\endlist % for efficiency
  715. \newenvironment{quote}{%
  716.   \list{}{\rightmargin\leftmargin}\item[]%
  717. }{%
  718.   \endlist
  719. }
  720. \let\endquote=\endlist % for efficiency
  721. \def\trivlist{\parsep\parskip\@nmbrlistfalse
  722.   \@trivlist \labelwidth\z@ \leftmargin\z@
  723.   \itemindent\z@
  724.   \let\@itemlabel\@empty
  725.   \def\makelabel##1{\upshape##1}}
  726. \renewenvironment{enumerate}{%
  727.   \ifnum \@enumdepth >3 \@toodeep\else
  728.       \advance\@enumdepth \@ne
  729.       \edef\@enumctr{enum\romannumeral\the\@enumdepth}\list
  730.       {\csname label\@enumctr\endcsname}{\usecounter
  731.         {\@enumctr}\def\makelabel##1{\hss\llap{\upshape##1}}}\fi
  732. }{%
  733.   \endlist
  734. }
  735. \let\endenumerate=\endlist % for efficiency
  736. \renewenvironment{itemize}{%
  737.   \ifnum\@itemdepth>3 \@toodeep
  738.   \else \advance\@itemdepth\@ne
  739.     \edef\@itemitem{labelitem\romannumeral\the\@itemdepth}%
  740.     \list{\csname\@itemitem\endcsname}%
  741.       {\def\makelabel##1{\hss\llap{\upshape##1}}}%
  742.   \fi
  743. }{%
  744.   \endlist
  745. }
  746. \let\enditemize=\endlist % for efficiency
  747. \newcommand{\descriptionlabel}[1]{\hspace\labelsep \upshape\bfseries #1:}
  748. \newenvironment{description}{\list{}{%
  749.   \advance\leftmargini6\p@ \itemindent-12\p@
  750.   \labelwidth\z@ \let\makelabel\descriptionlabel}%
  751. }{
  752.   \endlist
  753. }
  754. \let\enddescription=\endlist % for efficiency
  755. \let\upn=\textup
  756. \AtBeginDocument{%
  757.   \settowidth\leftmargini{\labelenumi\hskip\labelsep}%
  758.   \advance\leftmargini by \normalparindent
  759.   \settowidth\leftmarginii{\labelenumii\hskip\labelsep}%
  760.   \advance\leftmarginii by 6pt
  761.   \settowidth\leftmarginiii{\labelenumiii\hskip\labelsep}%
  762.   \advance\leftmarginiii by 6pt
  763.   \settowidth\leftmarginiv{\labelenumiv\hskip\labelsep}%
  764.   \advance\leftmarginiv by 10pt
  765.   \leftmarginv=10pt
  766.   \leftmarginvi=10pt
  767.   \leftmargin=\leftmargini
  768.   \labelsep=5pt
  769.   \labelwidth=\leftmargini \advance\labelwidth-\labelsep
  770.   \@listi}
  771. \newskip\listisep
  772. \listisep\smallskipamount
  773. \def\@listI{\leftmargin\leftmargini \parsep\z@skip
  774.   \topsep\listisep \itemsep\z@skip
  775.   \listparindent\normalparindent}
  776. \let\@listi\@listI
  777. \def\@listii{\leftmargin\leftmarginii
  778.   \labelwidth\leftmarginii \advance\labelwidth-\labelsep
  779.   \topsep\z@skip \parsep\z@skip \partopsep\z@skip \itemsep\z@skip}
  780. \def\@listiii{\leftmargin\leftmarginiii
  781.   \labelwidth\leftmarginiii \advance\labelwidth-\labelsep}
  782. \def\@listiv{\leftmargin\leftmarginiv
  783.   \labelwidth\leftmarginiv \advance\labelwidth-\labelsep}
  784. \def\@listv{\leftmargin\leftmarginv
  785.   \labelwidth\leftmarginv \advance\labelwidth-\labelsep}
  786. \def\@listvi{\leftmargin\leftmarginvi
  787.   \labelwidth\leftmarginvi \advance\labelwidth-\labelsep}
  788. \def\@startsection#1#2#3#4#5#6{%
  789.  \if@noskipsec \leavevmode \fi
  790.  \par \@tempskipa #4\relax
  791.  \@afterindenttrue
  792.  \ifdim \@tempskipa <\z@ \@tempskipa -\@tempskipa \@afterindentfalse\fi
  793.  \if@nobreak \everypar{}\else
  794.      \addpenalty\@secpenalty\addvspace\@tempskipa\fi
  795.  \@ifstar{\@dblarg{\@sect{#1}{\@m}{#3}{#4}{#5}{#6}}}%
  796.          {\@dblarg{\@sect{#1}{#2}{#3}{#4}{#5}{#6}}}%
  797. }
  798. \def\@secnumfont{\mdseries}
  799. \def\@sect#1#2#3#4#5#6[#7]#8{%
  800.   \edef\@toclevel{\ifnum#2=\@m 0\else\number#2\fi}%
  801.   \ifnum #2>\c@secnumdepth \let\@secnumber\@empty
  802.   \else \@xp\let\@xp\@secnumber\csname the#1\endcsname\fi
  803.  \ifnum #2>\c@secnumdepth
  804.    \let\@svsec\@empty
  805.  \else
  806.     \refstepcounter{#1}%
  807.     \edef\@svsec{\ifnum#2<\@m
  808.        \@ifundefined{#1name}{}{%
  809.          \ignorespaces\csname #1name\endcsname\space}\fi
  810.        \@nx\textup{%
  811.       \@nx\@secnumfont
  812.          \csname the#1\endcsname.}\enspace
  813.     }%
  814.   \fi
  815.   \@tempskipa #5\relax
  816.   \ifdim \@tempskipa>\z@ % then this is not a run-in section heading
  817.     \begingroup #6\relax
  818.     \@hangfrom{\hskip #3\relax\@svsec}{\interlinepenalty\@M #8\par}%
  819.     \endgroup
  820.     \ifnum#2>\@m \else \@tocwrite{#1}{#8}\fi
  821.   \else
  822.   \def\@svsechd{#6\hskip #3\@svsec
  823.     \@ifnotempty{#8}{\ignorespaces#8\unskip
  824.        \@addpunct.}%
  825.     \ifnum#2>\@m \else \@tocwrite{#1}{#8}\fi
  826.   }%
  827.   \fi
  828.   \global\@nobreaktrue
  829.   \@xsect{#5}}
  830. \let\@ssect\relax
  831. \newcounter{part}
  832. \newcounter{section}
  833. \newcounter{subsection}[section]
  834. \newcounter{subsubsection}[subsection]
  835. \newcounter{paragraph}[subsubsection]
  836. \renewcommand\thepart          {\arabic{part}}
  837. \renewcommand\thesection       {\arabic{section}}
  838. \renewcommand\thesubsection    {\thesection.\arabic{subsection}}
  839. \renewcommand\thesubsubsection {\thesubsection .\arabic{subsubsection}}
  840. \renewcommand\theparagraph     {\thesubsubsection.\arabic{paragraph}}
  841. \setcounter{secnumdepth}{3}
  842. \def\partname{Part}
  843. \def\part{\@startsection{part}{0}%
  844.   \z@{\linespacing\@plus\linespacing}{.5\linespacing}%
  845.   {\normalfont\bfseries\raggedright}}
  846. \def\specialsection{\@startsection{section}{1}%
  847.   \z@{\linespacing\@plus\linespacing}{.5\linespacing}%
  848.   {\normalfont\centering}}
  849. \def\section{\@startsection{section}{1}%
  850.   \z@{.7\linespacing\@plus\linespacing}{.5\linespacing}%
  851.   {\normalfont\scshape\centering}}
  852. \def\subsection{\@startsection{subsection}{2}%
  853.   \z@{.5\linespacing\@plus.7\linespacing}{-.5em}%
  854.   {\normalfont\bfseries}}
  855. \def\subsubsection{\@startsection{subsubsection}{3}%
  856.   \z@{.5\linespacing\@plus.7\linespacing}{-.5em}%
  857.   {\normalfont\itshape}}
  858. \def\paragraph{\@startsection{paragraph}{4}%
  859.   \z@\z@{-\fontdimen2\font}%
  860.   \normalfont}
  861. \def\subparagraph{\@startsection{subparagraph}{5}%
  862.   \z@\z@{-\fontdimen2\font}%
  863.   \normalfont}
  864. \def\appendix{\par\c@section\z@ \c@subsection\z@
  865.    \let\sectionname\appendixname
  866.    \def\thesection{\@Alph\c@section}}
  867. \def\appendixname{Appendix}
  868. \def\@Roman#1{\@xp\@slowromancap
  869.   \romannumeral#1@}%
  870. \def\@slowromancap#1{\ifx @#1% then terminate
  871.   \else
  872.     \if i#1I\else\if v#1V\else\if x#1X\else\if l#1L\else\if
  873.     c#1C\else\if m#1M\else#1\fi\fi\fi\fi\fi\fi
  874.     \@xp\@slowromancap
  875.   \fi
  876. }
  877. \newcommand{\@pnumwidth}{1.6em}
  878. \newcommand{\@tocrmarg}{2.6em}
  879. \setcounter{tocdepth}{2}
  880. \def\@starttoc#1#2{\begingroup
  881.   \par\removelastskip\vskip\z@skip
  882.   \@startsection{}\@M\z@{\linespacing\@plus\linespacing}%
  883.     {.5\linespacing}{\centering\scshape}{#2}%
  884.   \ifx\contentsname#2%
  885.   \else \addcontentsline{toc}{section}{#2}\fi
  886.   \makeatletter
  887.   \@input{\jobname.#1}%
  888.   \if@filesw
  889.     \@xp\newwrite\csname tf@#1\endcsname
  890.     \immediate\@xp\openout\csname tf@#1\endcsname \jobname.#1\relax
  891.   \fi
  892.   \global\@nobreakfalse \endgroup
  893.   \addvspace{32\p@\@plus14\p@}%
  894.   \let\tableofcontents\relax
  895. }
  896. \def\contentsname{Contents}
  897. \def\listfigurename{List of Figures}
  898. \def\listtablename{List of Tables}
  899. \def\tableofcontents{\@starttoc{toc}\contentsname}
  900. \def\listoffigures{\@starttoc{lof}\listfigurename}
  901. \def\listoftables{\@starttoc{lot}\listtablename}
  902. \AtBeginDocument{%
  903.   \@for\@tempa:=-1,0,1,2,3\do{%
  904.     \@ifundefined{r@tocindent\@tempa}{%
  905.       \@xp\gdef\csname r@tocindent\@tempa\endcsname{0pt}}{}%
  906.   }%
  907. }
  908. \def\@writetocindents{%
  909.   \begingroup
  910.   \@for\@tempa:=-1,0,1,2,3\do{%
  911.     \immediate\write\@auxout{%
  912.       \string\newlabel{tocindent\@tempa}{%
  913.         \csname r@tocindent\@tempa\endcsname}}%
  914.   }%
  915.   \endgroup}
  916. \AtEndDocument{\@writetocindents}
  917.  
  918. \let\indentlabel\@empty
  919. \def\@tochangmeasure#1{\sbox\z@{#1}%
  920.   \ifdim\wd\z@>\csname r@tocindent\@toclevel\endcsname\relax
  921.     \@xp\xdef\csname r@tocindent\@toclevel\endcsname{\the\wd\z@}%
  922.   \fi
  923. }
  924. \def\@toclevel{0}
  925. \def\@tocline#1#2#3#4#5#6#7{\relax
  926.   \ifnum #1>\c@tocdepth % then omit
  927.   \else
  928.     \par \addpenalty\@secpenalty\addvspace{#2}%
  929.     \begingroup \hyphenpenalty\@M
  930.     \@ifempty{#4}{%
  931.       \@tempdima\csname r@tocindent\number#1\endcsname\relax
  932.     }{%
  933.       \@tempdima#4\relax
  934.     }%
  935.     \parindent\z@ \leftskip#3\relax \advance\leftskip\@tempdima\relax
  936.     \rightskip\@pnumwidth plus1em \parfillskip-\@pnumwidth
  937.     #5\leavevmode\hskip-\@tempdima #6\relax
  938.     \hfil\hbox to\@pnumwidth{\@tocpagenum{#7}}\par
  939.     \nobreak
  940.     \endgroup
  941.   \fi}
  942. \def\@tocpagenum#1{\hss{\mdseries #1}}
  943. \def\@tocwrite#1{\@xp\@tocwriteb\csname toc#1\endcsname{#1}}
  944. \def\@tocwriteb#1#2#3{%
  945.   \begingroup
  946.     \def\@tocline##1##2##3##4##5##6{%
  947.       \ifnum##1>\c@tocdepth
  948.       \else \sbox\z@{##5\let\indentlabel\@tochangmeasure##6}\fi}%
  949.     \csname l@#2\endcsname{#1{\csname#2name\endcsname}{\@secnumber}{}}%
  950.   \endgroup
  951.   \addcontentsline{toc}{#2}%
  952.     {\protect#1{\csname#2name\endcsname}{\@secnumber}{#3}}}
  953. \def\l@section{\@tocline{1}{0pt}{1pc}{}{}}
  954. \newcommand{\tocsection}[3]{%
  955.   \indentlabel{\@ifnotempty{#2}{\ignorespaces#1 #2.\quad}}#3}
  956. \def\l@subsection{\@tocline{2}{0pt}{1pc}{5pc}{}}
  957. \let\tocsubsection\tocsection
  958. \def\l@subsubsection{\@tocline{3}{0pt}{1pc}{7pc}{}}
  959. \let\tocsubsubsection\tocsection
  960. \def\l@part{\@tocline{-1}{12pt plus2pt}{0pt}{}{\bfseries}}
  961. \let\tocpart\tocsection
  962. \def\l@chapter{\@tocline{0}{8pt plus1pt}{0pt}{}{}}
  963. \let\tocchapter\tocsection
  964. \let\tocappendix\tocchapter
  965. \def\l@figure{\@tocline{0}{3pt plus2pt}{0pt}{}{}}
  966. \let\l@table=\l@figure
  967. \def\refname{References}
  968. \def\bibname{Bibliography}
  969. \def\bibliographystyle#1{%
  970.    \if@filesw\immediate\write\@auxout
  971.     {\string\bibstyle{#1}}\fi
  972.         \def\@tempa{#1}%
  973.         \def\@tempb{amsplain}%
  974.         \def\@tempc{}%
  975.         \ifx\@tempa\@tempb
  976.                 \def\@biblabel##1{##1.}%
  977.                 \def\bibsetup{}%
  978.         \else
  979.                 \def\bibsetup{\labelsep6\p@}%
  980.         \ifx\@tempa\@tempc
  981.                 \def\@biblabel##1{}%
  982.                 \def\bibsetup{\labelwidth\z@ \leftmargin24\p@
  983.                 \itemindent-24\p@
  984.                           \labelsep\z@ }%
  985.         \fi
  986. \fi}
  987. \newenvironment{thebibliography}[1]{%
  988.   \@xp\section\@xp*\@xp{\refname}%
  989.   \normalfont\footnotesize\labelsep .5em\relax
  990.   \renewcommand\theenumiv{\arabic{enumiv}}\let\p@enumiv\@empty
  991.   \list{\@biblabel{\theenumiv}}{\settowidth\labelwidth{\@biblabel{#1}}%
  992.     \leftmargin\labelwidth \advance\leftmargin\labelsep
  993.     \usecounter{enumiv}}%
  994.   \sloppy \clubpenalty\@M \widowpenalty\clubpenalty
  995.   \sfcode`\.=\@m
  996. }{%
  997.   \def\@noitemerr{\@latex@warning{Empty `thebibliography' environment}}%
  998.   \endlist
  999. }
  1000. \def\bysame{\leavevmode\hbox to3em{\hrulefill}\thinspace}
  1001. \def\newblock{}
  1002. \newcommand\MR[1]{\relax\ifhmode\unskip\spacefactor3000 \space\fi
  1003.   \def\@tempa##1:##2:##3\@nil{%
  1004.     \ifx @##2\@empty##1\else\textbf{##1:}##2\fi}%
  1005.   \MRhref{#1}{MR \@tempa#1:@:\@nil}}
  1006. \newcommand\URL{\begingroup
  1007.   \def\@sverb##1{%
  1008.     \def\@tempa####1##1{\@URL{####1}\egroup\endgroup}%
  1009.     \@tempa}%
  1010.   \verb}
  1011. \let\URLhref\@gobble
  1012. \def\@URL#1{\URLhref{#1}#1}
  1013. \newif\if@restonecol
  1014. \def\theindex{\@restonecoltrue\if@twocolumn\@restonecolfalse\fi
  1015.   \columnseprule\z@ \columnsep 35\p@
  1016.   \twocolumn[\@xp\section\@xp*\@xp{\indexname}]%
  1017.   \thispagestyle{plain}%
  1018.   \let\item\@idxitem
  1019.   \parindent\z@  \parskip\z@\@plus.3\p@\relax
  1020.   \footnotesize}
  1021. \def\indexname{Index}
  1022. \def\@idxitem{\par\hangindent 2em}
  1023. \def\subitem{\par\hangindent 2em\hspace*{1em}}
  1024. \def\subsubitem{\par\hangindent 3em\hspace*{2em}}
  1025. \def\endtheindex{\if@restonecol\onecolumn\else\clearpage\fi}
  1026. \def\indexspace{\par\bigskip}
  1027. \def\footnoterule{\kern-.4\p@
  1028.         \hrule\@width 5pc\kern11\p@\kern-\footnotesep}
  1029. \def\@makefnmark{\hbox{$\m@th^{\@thefnmark}$}}
  1030. \def\@makefntext{\indent\@makefnmark}
  1031. \long\def\@footnotetext#1{\insert\footins{%
  1032.   \normalfont\footnotesize
  1033.   \interlinepenalty\interfootnotelinepenalty
  1034.   \splittopskip\footnotesep \splitmaxdepth \dp\strutbox
  1035.   \floatingpenalty\@MM \hsize\columnwidth
  1036.   \@parboxrestore \parindent\normalparindent \sloppy
  1037.   \edef\@currentlabel{\p@footnote\@thefnmark}%
  1038.   \@makefntext{\rule\z@\footnotesep\ignorespaces#1\unskip\strut\par}}}
  1039. \hfuzz=1pt \vfuzz=\hfuzz
  1040. \def\sloppy{\tolerance9999 \emergencystretch 3em\relax}
  1041. \setcounter{topnumber}{4}
  1042. \setcounter{bottomnumber}{4}
  1043. \setcounter{totalnumber}{4}
  1044. \setcounter{dbltopnumber}{4}
  1045. \renewcommand{\topfraction}{.97}
  1046. \renewcommand{\bottomfraction}{.97}
  1047. \renewcommand{\textfraction}{.03}
  1048. \renewcommand{\floatpagefraction}{.9}
  1049. \renewcommand{\dbltopfraction}{.97}
  1050. \renewcommand{\dblfloatpagefraction}{.9}
  1051. \setlength{\floatsep}{12pt plus 6pt minus 4pt}
  1052. \setlength{\textfloatsep}{15pt plus 8pt minus 5pt}
  1053. \setlength{\intextsep}{12pt plus 6pt minus 4pt}
  1054. \setlength{\dblfloatsep}{12pt plus 6pt minus 4pt}
  1055. \setlength{\dbltextfloatsep}{15pt plus 8pt minus 5pt}
  1056. \setlength{\@fptop}{0pt}% removed ``plus 1fil''
  1057. \setlength{\@fpsep}{8pt}% removed ``plus 2fil''
  1058. \setlength{\@fpbot}{0pt plus 1fil}
  1059. \setlength{\@dblfptop}{0pt}% removed ``plus 1fil''
  1060. \setlength{\@dblfpsep}{8pt}% removed ``plus 2fil''
  1061. \setlength{\@dblfpbot}{0pt plus 1fil}
  1062. \newcommand{\fps@figure}{tbp}
  1063. \newcommand{\fps@table}{tbp}
  1064. \newcounter{figure}
  1065. \def\@captionheadfont{\scshape}
  1066. \def\@captionfont{\normalfont}
  1067. \def\ftype@figure{1}
  1068. \def\ext@figure{lof}
  1069. \def\fnum@figure{\figurename\ \thefigure}
  1070. \def\figurename{Figure}
  1071. \newenvironment{figure}{%
  1072.   \@float{figure}%
  1073. }{%
  1074.   \end@float
  1075. }
  1076. \newcounter{table}
  1077. \def\ftype@table{2}
  1078. \def\ext@table{lot}
  1079. \def\fnum@table{\tablename\ \thetable}
  1080. \def\tablename{Table}
  1081. \newenvironment{table}{%
  1082.   \@float{table}%
  1083. }{%
  1084.   \end@float
  1085. }
  1086. \def\@floatboxreset{\global\@minipagefalse \centering}
  1087. \long\def\@makecaption#1#2{%
  1088.   \setbox\@tempboxa\vbox{\color@setgroup
  1089.     \advance\hsize-2\captionindent\noindent
  1090.     \@captionfont\@captionheadfont#1\@xp\@ifnotempty\@xp
  1091.         {\@cdr#2\@nil}{.\@captionfont\upshape\enspace#2}%
  1092.     \unskip\kern-2\captionindent\par
  1093.     \global\setbox\@ne\lastbox\color@endgroup}%
  1094.   \ifhbox\@ne % the normal case
  1095.     \setbox\@ne\hbox{\unhbox\@ne\unskip\unskip\unpenalty\unkern}%
  1096.   \fi
  1097.   \ifdim\wd\@tempboxa=\z@ % this means caption will fit on one line
  1098.     \setbox\@ne\hbox to\columnwidth{\hss\kern-2\captionindent\box\@ne\hss}%
  1099.   \else % tempboxa contained more than one line
  1100.     \setbox\@ne\vbox{\unvbox\@tempboxa\parskip\z@skip
  1101.         \noindent\unhbox\@ne\advance\hsize-2\captionindent\par}%
  1102. \fi
  1103.   \ifnum\@tempcnta<64 % if the float IS a figure...
  1104.     \addvspace\abovecaptionskip
  1105.     \moveright\captionindent\box\@ne
  1106.   \else % if the float IS NOT a figure...
  1107.     \moveright\captionindent\box\@ne
  1108.     \nobreak
  1109.     \vskip\belowcaptionskip
  1110.   \fi
  1111. \relax
  1112. }
  1113. \newskip\abovecaptionskip \abovecaptionskip=12pt \relax
  1114. \newskip\belowcaptionskip \belowcaptionskip=12pt \relax
  1115. \newdimen\captionindent \captionindent=3pc
  1116. \RequirePackage{amsthm}[1996/09/24]
  1117. \def\@swapped#1#2{#2%
  1118.   \@ifnotempty{#1}{\@addpunct{.}\quad#1\unskip}}
  1119. \def\thmhead@plain#1#2#3{%
  1120.   \thmname{#1}\thmnumber{\@ifnotempty{#1}{ }\@upn{#2}}%
  1121.   \thmnote{ \textmd{\upshape(#3)}}}
  1122. \def\swappedhead@plain#1#2#3{%
  1123.   \thmnumber{\@upn{#2}}\thmname{\@ifnotempty{#2}{. }#1}%
  1124.   \thmnote{ \textmd{\upshape(#3)}}}
  1125. \def\th@plain{%
  1126.   \let\thmhead\thmhead@plain \let\swappedhead\swappedhead@plain
  1127.   \thm@preskip.5\baselineskip\@plus.2\baselineskip
  1128.                                     \@minus.2\baselineskip
  1129.   \thm@postskip\thm@preskip
  1130.   \itshape
  1131. }
  1132. \def\th@definition{%
  1133.   \let\thmhead\thmhead@plain \let\swappedhead\swappedhead@plain
  1134.   \thm@preskip.5\baselineskip\@plus.2\baselineskip
  1135.                                     \@minus.2\baselineskip
  1136.   \thm@postskip\thm@preskip
  1137.   \upshape
  1138. }
  1139. \def\th@remark{%
  1140.   \thm@headfont{\itshape}% heading font bold
  1141.   \let\thmhead\thmhead@plain \let\swappedhead\swappedhead@plain
  1142.   \thm@preskip.5\baselineskip\@plus.2\baselineskip
  1143.                                     \@minus.2\baselineskip
  1144.   \thm@postskip\thm@preskip
  1145.   \upshape
  1146. }
  1147. \if@compatibility
  1148. \let\@newpf\proof \let\proof\relax \let\endproof\relax
  1149. \newenvironment{pf}{\@newpf[\proofname]}{\qed\endtrivlist}
  1150. \newenvironment{pf*}[1]{\@newpf[#1]}{\qed\endtrivlist}
  1151. \fi
  1152. \def\nonbreakingspace{\unskip\nobreak\ \ignorespaces}
  1153. \def~{\protect\nonbreakingspace}
  1154. \def\@biblabel#1{\@ifnotempty{#1}{[#1]}}
  1155. \def\@cite#1#2{{%
  1156.   \m@th\upshape\mdseries[{#1\if@tempswa, #2\fi}]}}
  1157. \@ifundefined{cite }{%
  1158.   \expandafter\let\csname cite \endcsname\cite
  1159.   \edef\cite{\@nx\protect\@xp\@nx\csname cite \endcsname}%
  1160. }{}
  1161. \def\fullwidthdisplay{\displayindent\z@ \displaywidth\columnwidth}
  1162. \edef\@tempa{\noexpand\fullwidthdisplay\the\everydisplay}
  1163. \everydisplay\expandafter{\@tempa}
  1164. \newcommand\seename{see also}%
  1165. \newcommand\see[2]{{\em \seename\/} #1}%
  1166. \newcommand\printindex{\@input{\jobname.ind}}%
  1167. \DeclareRobustCommand\textprime{\leavevmode
  1168.   \raise.8ex\hbox{\check@mathfonts\the\scriptfont2 \char48 }}
  1169. \hyphenation{acad-e-my acad-e-mies af-ter-thought anom-aly anom-alies
  1170. an-ti-deriv-a-tive an-tin-o-my an-tin-o-mies apoth-e-o-ses
  1171. apoth-e-o-sis ap-pen-dix ar-che-typ-al as-sign-a-ble as-sist-ant-ship
  1172. as-ymp-tot-ic asyn-chro-nous at-trib-uted at-trib-ut-able bank-rupt
  1173. bank-rupt-cy bi-dif-fer-en-tial blue-print busier busiest
  1174. cat-a-stroph-ic cat-a-stroph-i-cally con-gress cross-hatched data-base
  1175. de-fin-i-tive de-riv-a-tive dis-trib-ute dri-ver dri-vers eco-nom-ics
  1176. econ-o-mist elit-ist equi-vari-ant ex-quis-ite ex-tra-or-di-nary
  1177. flow-chart for-mi-da-ble forth-right friv-o-lous ge-o-des-ic
  1178. ge-o-det-ic geo-met-ric griev-ance griev-ous griev-ous-ly
  1179. hexa-dec-i-mal ho-lo-no-my ho-mo-thetic ideals idio-syn-crasy
  1180. in-fin-ite-ly in-fin-i-tes-i-mal ir-rev-o-ca-ble key-stroke
  1181. lam-en-ta-ble light-weight mal-a-prop-ism man-u-script mar-gin-al
  1182. meta-bol-ic me-tab-o-lism meta-lan-guage me-trop-o-lis
  1183. met-ro-pol-i-tan mi-nut-est mol-e-cule mono-chrome mono-pole
  1184. mo-nop-oly mono-spline mo-not-o-nous mul-ti-fac-eted mul-ti-plic-able
  1185. non-euclid-ean non-iso-mor-phic non-smooth par-a-digm par-a-bol-ic
  1186. pa-rab-o-loid pa-ram-e-trize para-mount pen-ta-gon phe-nom-e-non
  1187. post-script pre-am-ble pro-ce-dur-al pro-hib-i-tive pro-hib-i-tive-ly
  1188. pseu-do-dif-fer-en-tial pseu-do-fi-nite pseu-do-nym qua-drat-ic
  1189. quad-ra-ture qua-si-smooth qua-si-sta-tion-ary qua-si-tri-an-gu-lar
  1190. quin-tes-sence quin-tes-sen-tial re-arrange-ment rec-tan-gle
  1191. ret-ri-bu-tion retro-fit retro-fit-ted right-eous right-eous-ness
  1192. ro-bot ro-bot-ics sched-ul-ing se-mes-ter semi-def-i-nite
  1193. semi-ho-mo-thet-ic set-up se-vere-ly side-step sov-er-eign spe-cious
  1194. spher-oid spher-oid-al star-tling star-tling-ly sta-tis-tics
  1195. sto-chas-tic straight-est strange-ness strat-a-gem strong-hold
  1196. sum-ma-ble symp-to-matic syn-chro-nous topo-graph-i-cal tra-vers-a-ble
  1197. tra-ver-sal tra-ver-sals treach-ery turn-around un-at-tached
  1198. un-err-ing-ly white-space wide-spread wing-spread wretch-ed
  1199. wretch-ed-ly Eng-lish Euler-ian Feb-ru-ary Gauss-ian
  1200. Hamil-ton-ian Her-mit-ian Jan-u-ary Japan-ese Kor-te-weg
  1201. Le-gendre Mar-kov-ian Noe-ther-ian No-vem-ber Rie-mann-ian Sep-tem-ber}
  1202. \def\calclayout{\advance\textheight -\headheight
  1203.   \advance\textheight -\headsep
  1204.   \oddsidemargin\paperwidth
  1205.   \advance\oddsidemargin -\textwidth
  1206.   \divide\oddsidemargin\tw@
  1207.   \ifdim\oddsidemargin<.5truein \oddsidemargin.5truein \fi
  1208.   \advance\oddsidemargin -1truein
  1209.   \evensidemargin\oddsidemargin
  1210.   \topmargin\paperheight \advance\topmargin -\textheight
  1211.   \advance\topmargin -\headheight \advance\topmargin -\headsep
  1212.   \divide\topmargin\tw@
  1213.   \ifdim\topmargin<.5truein \topmargin.5truein \fi
  1214.   \advance\topmargin -1truein\relax
  1215. }
  1216. \calclayout % initialize
  1217. \pagenumbering{arabic}
  1218. \pagestyle{headings}
  1219. \thispagestyle{plain}
  1220. \if@compatibility \else\endinput\fi
  1221. \def\tiny{\Tiny}
  1222. \def\defaultfont{\normalfont}
  1223. \def\rom{\textup}
  1224. \endinput
  1225. %% 
  1226. %% End of file `amsart.cls'.
  1227.